inherited FrmCad_TitulosFormulas: TFrmCad_TitulosFormulas
  Left = 191
  Top = 104
  Caption = 'Cadastro de t'#237'tulos e f'#243'rmulas'
  ClientHeight = 343
  ClientWidth = 592
  OldCreateOrder = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Width = 592
    object Label2: TLabel
      Left = 36
      Top = 20
      Width = 39
      Height = 14
      Caption = 'C'#243'digo'
    end
    object BtnDemo: TSpeedButton
      Left = 127
      Top = 16
      Width = 23
      Height = 22
      Enabled = False
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
        333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
        C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
        F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
        F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
        00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
        3333333373FF7333333333333000333333333333377733333333333333333333
        3333333333333333333333333333333333333333333333333333}
      NumGlyphs = 2
      OnClick = BtnDemoClick
    end
    object Label5: TLabel
      Left = 184
      Top = 18
      Width = 337
      Height = 32
      Caption = 
        'nome do arquivo de demonstrativos  = RDemonstra.dem'#13#10'nome do arq' +
        'uivo de historicos - RHistorico.HIS'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      Visible = False
    end
    object EdtCod_titformula: TEdit
      Left = 80
      Top = 16
      Width = 41
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      MaxLength = 3
      TabOrder = 0
      OnEnter = EdtCod_titformulaEnter
      OnExit = EdtCod_titformulaExit
      OnKeyDown = EdtCod_titformulaKeyDown
    end
    object BtnImprimir: TBitBtn
      Left = 166
      Top = 15
      Width = 163
      Height = 25
      Caption = 'Configurar Impress'#227'o'
      TabOrder = 1
      OnClick = BtnImprimirClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0003377777777777777308888888888888807F33333333333337088888888888
        88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
        8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
        8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
        33333337FFFF7733333333300000033333333337777773333333}
      NumGlyphs = 2
    end
  end
  inherited Panel2: TPanel
    Width = 592
    Height = 219
    object BtnInsereHistorico: TSpeedButton
      Left = 21
      Top = 36
      Width = 25
      Height = 18
      Hint = 'Insere um novo hist'#243'rico na lista.'
      Flat = True
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      Layout = blGlyphRight
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = BtnInsereHistoricoClick
    end
    object Label11: TLabel
      Left = 52
      Top = 37
      Width = 56
      Height = 14
      Caption = 'Hist'#243'ricos'
      Font.Charset = ANSI_CHARSET
      Font.Color = clActiveCaption
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 22
      Top = 12
      Width = 54
      Height = 14
      Caption = 'Descri'#231#227'o'
    end
    object ListaHistorico: TCheckListBox
      Left = 20
      Top = 57
      Width = 399
      Height = 156
      BevelKind = bkFlat
      BorderStyle = bsNone
      Font.Charset = ANSI_CHARSET
      Font.Color = clMaroon
      Font.Height = -9
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 12
      ParentFont = False
      TabOrder = 1
    end
    object EdtDescricao: TEdit
      Left = 80
      Top = 8
      Width = 337
      Height = 22
      BevelKind = bkFlat
      BorderStyle = bsNone
      CharCase = ecUpperCase
      MaxLength = 40
      TabOrder = 0
    end
  end
  inherited Panel4: TPanel
    Top = 276
    Width = 592
    inherited btnGravar: TFlatButton
      OnClick = btnGravarClick
    end
    inherited BtnEliminar: TFlatButton
      OnClick = BtnEliminarClick
    end
  end
  inherited BS: TStatusBar
    Top = 324
    Width = 592
  end
  object PnlBusca: TPanel [4]
    Left = 536
    Top = 16
    Width = 417
    Height = 249
    TabOrder = 4
    Visible = False
    object Label1: TLabel
      Left = 10
      Top = 7
      Width = 264
      Height = 16
      Caption = 'Listagem dos demonstrativos cadastrados'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object DBGrid1: TDBGrid
      Left = 8
      Top = 28
      Width = 401
      Height = 181
      Color = clInfoBk
      DataSource = DsDemo
      Options = [dgEditing, dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnKeyDown = DBGrid1KeyDown
      Columns = <
        item
          Expanded = False
          FieldName = 'codigo'
          Title.Caption = 'C'#243'digo'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Descricao'
          Title.Caption = 'Descri'#231#227'o'
          Width = 325
          Visible = True
        end>
    end
    object BtnOk: TBitBtn
      Left = 9
      Top = 212
      Width = 56
      Height = 32
      Caption = 'OK'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = BtnOkClick
    end
  end
  inherited Timer1: TTimer
    Left = 556
    Top = 33
  end
  inherited RDP: TRDprint
    Left = 520
    Top = 1
  end
  object CdsDemo: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 552
    Top = 8
    object CdsDemocodigo: TStringField
      FieldName = 'codigo'
      Size = 3
    end
    object CdsDemoDescricao: TStringField
      FieldName = 'Descricao'
      Size = 40
    end
  end
  object DsDemo: TDataSource
    AutoEdit = False
    DataSet = CdsDemo
    Left = 524
    Top = 32
  end
end
